From f05793293f048b38357316ce55b6223321178cbd Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 22 Feb 2001 01:47:40 +0000 Subject: [PATCH] (comment-forward): Skip the comment-start before searching for the comment-end. --- lisp/newcomment.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/newcomment.el b/lisp/newcomment.el index f67e81b3414..09b928dea26 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el @@ -5,7 +5,7 @@ ;; Author: code extracted from Emacs-20's simple.el ;; Maintainer: Stefan Monnier ;; Keywords: comment uncomment -;; Revision: $Id: newcomment.el,v 1.28 2000/12/11 21:41:35 monnier Exp $ +;; Revision: $Id: newcomment.el,v 1.29 2000/12/18 03:17:31 monnier Exp $ ;; This file is part of GNU Emacs. @@ -367,6 +367,7 @@ and can use regexps instead of syntax." (skip-syntax-forward " ") (setq n (if (and (looking-at comment-start-skip) + (goto-char (match-end 0)) (re-search-forward comment-end-skip nil 'move)) (1- n) -1))) (= n 0)))) -- 2.30.2